home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 17 / CU Amiga Magazine's Super CD-ROM 17 (1997)(EMAP Images)(GB)[!][issue 1997-12].iso / CUCD / Programming / AMOSList / AMOSLIST.0897 / 000104_amos-request@svcs1.digex.net_Thu Aug 7 18:42:13 1997.msg < prev    next >
Text File  |  1997-09-09  |  2KB  |  63 lines
  1. Received: from svcs1.digex.net (svcs1.digex.net [204.91.197.224])
  2.     by mail3.access.digex.net (8.8.5/8.8.5) with ESMTP id SAA00128
  3.     for <mcox@access.digex.net>; Thu, 7 Aug 1997 18:42:11 -0400 (EDT)
  4. Received: (from daemon@localhost)
  5.     by svcs1.digex.net (8.8.5/8.8.5) id OAA24653
  6.     for amos-out; Thu, 7 Aug 1997 14:19:45 -0400 (EDT)
  7. Received: from mail1.access.digex.net (mail1.access.digex.net [205.197.247.2])
  8.     by svcs1.digex.net (8.8.5/8.8.5) with ESMTP id OAA24650
  9.     for <amos-list@svcs1.digex.net>; Thu, 7 Aug 1997 14:19:44 -0400 (EDT)
  10. Received: from cheviot.ncl.ac.uk (cheviot.ncl.ac.uk [128.240.233.51])
  11.     by mail1.access.digex.net (8.8.5/8.8.5) with ESMTP id OAA00518
  12.     for <amos-list@access.digex.net>; Thu, 7 Aug 1997 14:19:39 -0400 (EDT)
  13. Received: from TOWN4.ncl.ac.uk by cheviot.ncl.ac.uk id <TAA23916@cheviot.ncl.ac.uk>
  14.   (8.7.6/ for ncl.ac.uk) with ESMTP; Thu, 7 Aug 1997 19:19:35 +0100 (BST)
  15. Received: from TOWN4/SpoolDir by TOWN4.ncl.ac.uk (Mercury 1.21);
  16.     7 Aug 97 19:19:32 GMT0BST
  17. Received: from SpoolDir by TOWN4 (Mercury 1.30); 7 Aug 97 19:19:14 GMT0BST
  18. From: "Chris Coulson" <C.J.Coulson@newcastle.ac.uk>
  19. Organization: is something alien to me...
  20. To: amos-list@access.digex.net
  21. Date: Thu, 7 Aug 1997 19:19:14 GMT0BST
  22. Subject: Re: Rnd and Qrnd
  23. Reply-to: chris@tornado.pair.com
  24. Priority: normal
  25. X-mailer: Pegasus Mail for Windows (v2.23)
  26. Message-ID: <3A12844A7B@TOWN4.ncl.ac.uk>
  27. Status: O
  28. X-Status: 
  29.  
  30.  
  31. > For N=1 to 3
  32. > Print Rnd(10)
  33. > Next N
  34. > 
  35. > ---some command here---
  36. > 
  37. > For N=1 to 3
  38. > Print Rnd(10)
  39. > Next N
  40. > 
  41. > So that the 2nd three random numbers are the same as the first three.
  42. > I thought that if I put Randomize 1 (or whatever) in front of both of the loops, it would work, 
  43. > but it doesn't...
  44.  
  45. Not sure about QRnd, but to get Rnd to obey the Randomize
  46. command you have to use -ve numbers in the Rnd call.
  47.  
  48. i.e.
  49.  
  50. Randomize 42
  51. For N=1 to 3
  52. Print Rnd(-10)
  53. Next N
  54.  
  55. will *always* give you the same 3 numbers.
  56.  
  57.  
  58. Chris
  59. -- 
  60. +- The Best of Both Worlds...
  61. |Amiga 4000/060 50MB/1.2GB/CV64  P150 32MB/1.7GB/Stealth64VRAM |
  62. | CyberSCSI/Zip/Vlab YC/4xCDROM  8xCDROM/Zip/TM PFCS+WCS2/AWE32|
  63.                                  http://www.tornado.pair.com/ -+